EXdk6éXxddeg*xdedekdkKgkxEddddx4xy*xxxxxxAXx«AXxXxxÁAÁxAx««xxxxExkxkccxk 


* INDIANA SINCLAIR-TIMEX USERS GROUP NEWSLETTER * 
HSH RE RE EEK ER MRE KERR KERR RE 


JULY 1987 Editor-Frank Davis 


AUGUST MEETING 38-229 af 1/20 D» 

The next meeting of the Users Group ISTUG; will be at the 
home of Willie Jones, group librarian and ISTUG BBS Sysop, His 
address is 10124 East 3rd, Indianapolis. IN 46236. For Further 
directions you may cali him at i7-897-922 voice or 
217-898-Z9?83 by modem, My hat off to Willie For hosting this 
mesring, The meeting will have a door prize, and only those who 
attend will be eligible to win, It is the truth when I say that 
the door prize alone is worth more than the cost of your 
membership in ISTUG. 

We came dangerously close to having no meeting this month, 
YOu Will recall that in last months issue I asked that if 
someone wanted to host the August and September meetings to 
either call me or leave a message on the ISTUG BBS. I got 
absolutely no response aon that and was perplexed to say the very 
least, By hosting a meeting you get a chance to show GFF what 
type of computer setup you have going for you, or if you are 
| having problems with it then you have the ideal time to apply a 
little group effort to getting it straightened out, Don't worry 
az tO whether your house is uP to BETTER HOMES AND GARDENS iccks 
to decide as to whether to host the next meeting, we usually get 
so busy that we never notice anyway, Sco how about a voLunteer 
For some of the upcoming meetings, Or perhaps it is time to Find 
a Facility that will allow us to use their space, Contact me on 
this at 317-473-8821. Ed. Frank 


AN APPEAL .....A LETTER TO ISTUG 


"I saw your user group listed in the May ~issue of COMPUTER 
SHOPPER. I am a TSi99@ user with a Problem, Perhaps your user 
group could help me out, 

I recently purchased a 32K Memotech RaMPack for my TSi@ag. 
My Problem: the RüMPack is not compatible with my Westridge 2958 
modem, I had to make a minor modification to my T5280480 printer 
to use the RüMPack, Gnd it works Fine with the 2040 and the 
T51818 RPAMPACK combined, It also works With just the TSi@is RAM. 

I am interested in receiving any tips/information 
concerning modifications, etc, which can be made to make the 
modem and RAM compatible, Have any of your members experienced 
Similar problems? With these rampacks reappearing on the market 
ate such an attractive price, I'm sure it won't be long, 

My sister is also a T51808 user and is looking for a full 
| size keyboard if anyone has one (preferably  Suntronics ar 
similar asy hookup), Incidentally, she also has a Memotech RAM 
| (14K) and has the same problem, 

Thank you for your time and attention, 
Sincerely, 
Mark Swartz 
73i Mohawk Street 
Allentown, PA 18183 " 


"T 
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Anyone who thinks they can shed some light on this write 
5 ree 


page 2 
WAFADRIVE NOTES AND PROGRAM 
: l ty James Kerr 

JuSt dropping a hint on ARTWORK. The Kempston search on the 
Rotronics Toolkit won't Find the joystick port in the Spectrum 
Version (that can be loaded on the Warfa-drive), But if you load 
the program,, .move to "SAVE"-answer Filename with 9999 (gets you 
into Basic} then POKE Z81801,223:POKE 44538,223 (ENTER) then GOTO 
8085 you will be able to use the Kempston Joystick or joystick 
interface as described in Time Designs (May/June 84’) issue, OF 
course changes have to be made to Line 9998 to save to Wafa as 

it is configured for Micro-Grive, 


P.5., In the Feb. 87’ newsletter I tried to explain how to make 
backups of protected wafers, here is a program I wrote ta help 
ma do this easily: 


1 REM x*xTO Make Backup Copies For Wafa-Drives From 
Protected Wafers For own use ONLY! 
2 REM J. Kerr 
18 LET as24882 
28 DIM n$(i180: POKE 234558,8 
25 PRINT " PLACE Wafa to Copy in Drive 'g'*'*Hit any 
Key":PAUSE B: CAT # $ 


30 INPUT "Name of file to un-protect? (as listed)?*;n$ 
ci TO 18? 

35 PRINT INK 4;".PRG-8  (non-running)*''.PRGx-128 (self 
run)*'*.BYT-1 (reg,  CODED)"''*,BYTH OR #=129 (selr run 


CODE) "’*".DAT=2(DATA File SCREENS OR text": INK 8 

48 INPUT 'NOo.? '; 

$0 FOR jza*48 TO (G+68)+((PEEK (a*26) 12) *PEEK. (a+24)-PEEK 
(a* 25)? 

680 LET 1$-CHR$ (PEEK Jj) *CHR$ PEEK (Jj*1)-*CHR$ PEEK 
(J*2)*CHR$ PEEK (J+3)+CHR$ PEEK (J+4)+CHRS PEEK (Jj450*CHR$ PEEK 
(Jt6) +CHRS PEEK (J+7)+CHRS PEEK (J+8)+CHRS PEEK (j+?) 

62 IF n$-1$ THEN POKE Jj*18.n: GO TO 188 

65 NEXT j 

780 PRINT ' ''Is it exactly as listed?': INPUT "Y/N "39% 

80 IF qa$-'n' OR q$-z"N' THEN GO TO 18 

90 PRINT "Well I Can't Find It!'': STOP 

188 PRINT "Put FORMATed Wafa in Drive''B''*''"'MAKE SURE 
enough spare for XFer'''*'HIT ANY KEY WHEN READY": PAUSE G 

110 MOVE #"G:"+n$ TO 'b:': CAT#"b:" 

120 INPUT "Anymore ? Y/N ';d$: IF q$-'y* OR G$="Y" THEN GO 
TO 18 

138 STOP 

158 SAVE *"A: BACKER" LINE i 


FURTHER PROGRAMS 

On the next few pages ue have two different programs, . 

The First is Money Manager (MonMan) by Paul Holmgren, This 
is an excellent program to manage just about all oF your money 
and if applied may help you to hold onto more of it (or at lease 
be able to account For where it went to). The program is in this 
issue and the docs for it will be in the next issue, (That issue 
is almost complete other than Finding out where the next meeting 
Will be in Septembernr,) The Program is commercial Quality. 

The second program is one by Basil Wentworth, It is short 
But useful in order to generate a frame around a character, Ic 
should save you some time and a little wear on the grey matter, 


ccm x i 
DEF FN TiP) un. “INT (P) 34 


BB+. D - 188" 
30 REM EMINRE 


40 CLS : PEKE 23658,8: GO TO 6 


Gin: DATA ".1N4","FEB","HHR" , “RER 
7". “RAY , “JLRS” , “JUL” , “RUG” ,"SEP", 
“GOT” , “HG , “BEC” 

55 PHINT - PLOT nB,PEEK Z36894 
@-ie: DRHU £55,N8: RETURN 

6@ LET X-36- LET L-184: CO TO 


Te LEY X-88- LEY LL -28 

Ge PLOY X.171- GARRY L, HS: BRA 
He,-i6- DHS -E Hg: DRRY He ,186- 
ELFUBHH 

GS THSLIT UB tn make Entries"" 
"Ui to return tn menu RAF viu 
: IF wsHi THER DU TD ce 
ice RETURN 

Lif n peek =PEEK 2346893: PRINT 


Ss zOrtf G: 


== ff: RETURN 
128 PRINT HT 18,H9,,,,,,,,: POK 
E 23689,peek: RETURN 
130 PRINT HN1;"No such Item, pr 
ess ENTER": PAUSE NØ: RETURN 


158 INPUT "Dn you wish a COPY " 
;P&: IF P£-^"" THER E0 TO 158 

166 IF PEXiIN1!-"yY" THEN COPY 

172 IF go THEN RETURN 

188 PRINT HH1,"Press ENTER for 
Henu 7: PRUSE NƏ: RETURN 

198 PRINT ""To stop entries ENT 
ER Ean; 60 SUB S50: PRINT , 
Higo? ; TRB 25; “Year” 

266 IF B THEN INPUT “Is this a 
REG Ómonth7 ";£5£t- IF FPe=-"" THEN S 
ü TD res 

216 LEY B-A: RETURN 

e228 RESTORE - FOR I-2 TO 24 STE 
P 2: READ PX 

238 IF F3=-Htini, TO 3) THEN LET 


£248 HEXI I- RETURN 
-IŅNCOHE- 


518 PRINT “TAS 13; “INCCHE™: GO 
SUH 78: 3 DIES Sine: REH Si 

S28 PHIHI ~““Tiem” e$ ini); TRA £2 
Sa8 GO SUB 52: FOR B-N1 TO IHX 
S48 CO SUS 5158: REM 52 

558 PRINT L318} HiB); TRE 24; F iB 
S62 HEET B: £i SUB 58 

576 PRINT “fotat”, HT; TRE 24; FT 
S88 GO SUB 38: IF w THEN RETURN 
Sus CLS - Ec 10 Zora 


REM ELDTTITITII " 
1818 PRINT “THE 12; "EXPENSES": 6 


41626 PRINT ""Iiem",H*i2);THB 25; 
“Wear: ED SUB 58 

ifae FOR I=ni Ti E d 3 

1648 80 5EB ISZ: 5 

185g PRINT ISiIP,H(IN;THB 24;TiI 
}: HEXI I: 60 SUB 58 

1858 PRIH “ToTSL", AT, TRB Z4; TTF 

A878 66 Sun Ge: IF kÀ5 THEN RETURN 


2608 CLS - 68 TD Zoea 


588 REH EILEEN 
1518 PRINT "IH: 5, “ASSETS and LI 
ABILITIES”: £0 SUB 58 
1528 GO SUB 5153: REM s4 ps 
i538 PRINT ~~ Checking bal. ”; TEB 
2S-LENH SFPHE€ DCK;7£";CK," Cash Ca 


Savings 5a3:."; TRE SO-LEH SIRS SA 
P"€".5H. 


1548 PRINT x 
EH SYR C32 t"; E 

posit”; TBB 25-i EM si CD;"X";UCD 
2; Stocks”; THE 23-LEN STHX 5T;"X 
TSF; 

1558 PRINT " Hisc. Assets”; TAB 2 
S-LEH STR HA, E”; HR,” Property” 
7; THE 23-LEH SYTHE PHRIUE£UIPR 

31568 LEY B-LrESCE ÉDGSHERCHGCDGSTaHAHG 


PR 
1578 AS INT "EEEETXT3^;THB 23-LEN 


i588 60 Sua se. PRINT - Hortgage 
“,TRE 23-LEN SIRS HE; "S$"; HG,” In 
s. Loan”; TAB BS-LEM STH 10."£7; 
LL," 2nd Hort.“;TRE 23-LEN STR 
L2;"4";L2 
3508 LEY B-HGiL i 42. PRINT "Bes 
3°; THE 235-LEN SIRE 8; "$7; 
B 


4688 LET B-i5SHPiCHARCK GC 5T4CD4PRA4 HB 
)-B 

1618 EQ SUR S8: PRINT "Het Uorth 
“;TRE SG-0PEH SYR B; o 

1628 ED SUB 125- RETUE 

2888 RER BE = Ti 

z818 LET qor PRIN? “TRE 9;"n 
come entries": GO SUB 6B: GD SUB 


198 
resp IF Pe ihi}="yY" THEN LET HTH 
€&- DIF HIG}: IHPUTI "Type month t 
3 tetters e.g. JAR) “jmtini}: LE 
T PX-" ": CLS - BD TO 28898 
PEJE GO SUB 5298 
CEAP INPUT " Item “P$: IF PX- 
ETURH" i TO LEN P$) THEN RETURN 
2E58 FOR B-NH1 TO IHX 
SE6C IF Px-LX(HB, TO LEN PX) THEN 
60 TO 2eca 
PETE NEXT B: Ci SUB 128 
SEBS £0 Te 28543 
rege PRINT I Sici HiB}; PRE 24;Fi15 


3 

2108 INPUT “insunt $"; TR: GO 5UB 
138: IKPUT "For account? “;T 

2118 LET PE£-Tt- LET go-21ga. cit 

Te 52478 

rire bci SUM 328. 

Ziza IF PIt-"ULE^ THER CKR-CK+T 


LET 

S149 IF T£-"58" THEN LET 5H-5H:TF 
2158 IF T1£-"tt" TREN LET CCO=CC+F 
2158 IF T$="CR”" TREN LET CH-CH4T 
2 LET 
LEF 


2178 IF TI£X-"ST" FHER ST=5f+fF 
R 
2188 IF Fe="CD*" THER CD=-CD+T 
R 
2198 IF T€X-"HH" THEN LET MA=HAVT 
R 


2288 IF 531 THEN RETURN 

SES LEY HiIBI-HIB)HTH- LET HT-HT 
+FR: LEY FiBi-PFIBRTH- LEY FT-FT 
4+TR 

Beee £2 SUS 53: PRINT "TO DRTE” 
HIB; TAB 24;F153 

Z238 ni SUR 52: PRINT "Total Inc 
ome” ,HT; TRS si, 

2c4e@ CO SUB Z235: LET UILB-—H1)-HT 
2258 bti SUD B. GE TO 28428 


ESIS LET go=2- PRINT “TRH 9; “Exp 
ERSE Pnirient": 69 5EB 68: 60 Sun 


2578 IF P£iMHI)P-"Y^7 THEN LET HT-N 
O: LET PPTI-N8- DIK miEHX)- INPUT 

"Iupe month i3 letters e.g. JHH 
) ";Ht€i2)- LET pga" "- CLS : 60 
TO 2568 

538 INPUT " Item ";P*- IF P£-"R 
ETURN"( TO LEH ee: beer BETURN 
P5408 FOR 5-Hi1 TO SHX 


io, PO LEN PX) THER 


athe E sim 


33: 60 Fe 2553 
iB} HiB}; TRE 24;T iB 


23 REPUT “iesunt £°;TR: 60 sis 
iie: FHT “From Account? -= Hz 
B66 LEY 2-83: LET go-2598- 25 
FTG 52478 
ESIS SG SUB i285: IF 8¢="SA" THEN 


re 
2626 IF B£-"LL" THEM LET CC-CC-T 
n IF &8B£-"ChH" THEN LET ChH-ChH-T 


Eie ir $3="C0H%*" THER LET CK-CK-T 
S658 LEY Hii HiB)TH: LET HT-HT 
TEN. LET TiBi-TiB)b-TR-: LET TT-iT 
+ 

S666 ci SUB S8: PRINT “Total Exp 
ERSE”, HF; TRB 24; FT 

S678 CO SUG 58: PRINT "To date", 
HiB); TAB 2Zi,TiH) 

2656 co sum B28: LEFT RiB} = : LE 
1 UiBi-HP 

sos en SB 58. 60 Ta D 


351; ii go THEN PRINKI " Z 

Year Expenses Eraph" 

3526 IF HEY go THEN PRINT " 
Income Expense Graph” 

GS38 ED SUB 5B 

3548 FR I-15 T0 HO STEP —H1 

3558 PRINT AY iF7-1,115; “%"; 12283 
7: IF HOY I THEN PRINT "B5", 

S568 FOR DB-Ni T0 24 

3578 IF go THEN LET YƏR (8) +-Iz23 


a 

35658 IF HY go THEN LET Y-UiBW)4— 
Ixsce8à 

3596 IF Yrc—25 THEN PRINT " ";- B 
0 TD 3538 

S668 LEY :nk—7: IF 8r2«>INT (8-2 
} THEN iti ink=4 

Soie IF ¥3-26 BHD Yili THEN PRIN 
1 IRE ink; Tm; 

ee IF yor. THEN PRINT INK ink; 
35535 HEKF B 

3548 PRINT : HEXI I 

3558 IF go THEN PRINT " i984. F 
HAH dda S GH DTC? 1385 J F 
HA HG 6 HS 8 H DUCTHB 7; Expe 
RSE 4984-7985" 

S668 IF #GY gs THCH PRINT " 
TETETE PEE TETE TE IE TETEIE”,” 

vu F B H d = HSB GH D,” I 
nUtDi:tE and Expense 1885" 

ue LEY g=: GO SUB 1585: HETU 
#288 REN BESS 

4832 PRINT NI "3; "Budget" 65 
SUB 7& 

46268 PRINT ""Expenses","To date 
Budget": 80 5UB 58 

4836 FGR H=-#1 TS EHX 

4646 PRINT I35 tH} , TIN} | TRB 25; 
4658 CO SUB 51658: REH s5 

42628 PRINT pini- EXT n 

4278 GD SUG S38: PRINT "Totalils",T 
T; TRB 25;58F 

4606 INPUT “gia”; ps: IF p=" 
uy" GR pe="¥" THEN FOR n-ni TO em 
x: LPRINT pini, tin) TRE 25;p in}: 


45868 PRINT H$iniij TAa 35; "Year 
: 60 Sb ss 

f PRINT "^Inrüme-"7,HT; TAB 24; 
Mo PRINT ~“Expense:”, HY; TRE 24 


E 

4558 PRINT ^"isan Prin. pd.-",PP 
T; TRE 24á;PPX 

4568 GO SUB SS: PRINT ^"Net-",HT 
-HT-PPT; TAS Z4; FN T(0FT-T1-PPXI 
4578 SO SUH 14S- RETURN 


EFHEEN- = 

36216 PRINT 777 i Principat Paum 
ent on ibpans"""" 1 #¥Fransfers be 
tween Hccounis"- EO SUB 5B 

Sere INPUT "Spiect number “; FR: 
iF TH THERN £2 Jo S278 

S563438 CLS : PRINTF """Uhich toan a 
Fe uou paying nn7"- GO SUB 58 
S465 PRINT " 8 Hortgage"^" 1 2 
nd Horigsge""" 2 Insurance Loan 
=: 0 5UB 59 

S656 INPUT "Select number ";TR 
S868 PRINT “Justi Input the Princ 
ipal paid. ajusts Assets sLiahki 
tities hbr&e."- £9 SUB SE 

S37 PRINT i“Hsrigage- x 
RED IR-neic-i^" ond Hortgage: »i 
ARD TIR-Hibri" Insurance Loan: " 
AND TR-2!; 

SEBBE INPUT "Prin. payment = $";P 
P: PRINT PP 

5898 LEY PPI-PPIGPP- DET PPX-PPX 


cid INPUT "Paid from whith acco 
unt? ";YvY£X 

siib LEY P£-YE€: LEF go=-5ies- Ga 
Ye 5478 

Sise IF NOY YH THEN LET #e=-HG-FP 
5138 IF FEH-Hi THER DET Lz-i 2—PP^ 
S248 IF TR=2 THEN LET Li -i -PP 
5158 IF Y€-"565" TREN LEY S5H-5H-P 


Si6e IF Yti-"tLAK" YREN LET CK-CK-P 
5176 IF Y$="Cr" TREN LEY CC-CC-P 


S238 66 5EB 52 
5198 PRINT ("Hes pnd Hart. bal. 
£^" HRG E-Hilri"Heu Ins. Loan b 
at. x" HERD TH=2}4 "New Hortgage 
bal x" AND TR-HE!, 
S286 PRINT (i2 AND TR-Hi)ibll FN 
D TR=2} -+4 iPS BUD JRK} 
5236 Dci sini 345 
S228 PRINT "i iransrier between a 
tcounis","z reiurn to Henu"^"3 a 
Rother Loan Puiuuzbnt7","4 see acc 
GERİ batances~ 
5238 TS YT “Ssiect number “; $ 
IF TH>4 THER £0 Te S258 
S248 CLS : IF YR=2 THEN RETURN 
S258 IF TR=35 THEN 60 TO 5838 
S268 IF TR=-4 THEN 60 TO i588 
5278 CLE : PRINT “TRE 9; "frans fe 
f Funds": 6B HS 65 
Slee IHPUI “Transfer how much? = 
=; FR 
F4 
S298 INPUT “Transfer *X";lTHR);" F 
fom Account? "7;U* 
S388 LEY PEx€-iUX- LET go-5so8- Dii 
Te 5478 : 
53156 INPUT “to Hccount “;Ts 
S388 LEF P$=-f$: LEF go-5318- 650 
Te 54748 


5338 IF U¢="SR"“ THEN LET SH-SH-T 
$348 IF Ux-"HáA" THEN LET Hü-HhH-T 
S358 IF U$--CC" THEM LET CC-CC-T 
Sase IF U$=7ER" THER LET CK-CK-T 


S378 IF Ui-" L5" THEN PET CD-CD-T 
R 


5588 IF U£-"ST" THEN LET ST-ST-T 


S558 IL 3" THEN DET CH-UH-T 


E8 LET Si=Na: 66 SUD 2138: LEF 


S416 PRINT - 60 SUB Se 

S46 PRINT “You transfered 4"; TR 
37 fros OU HES in ONS 

S438 IPEF Usi Hnother transfer? 
; A Heturn ta Henu","r See re 

vised Accounts "FR: IF T 

Roe THER ED PD 5458 

S448 IF FR-#HI THEN RETURN 

S456 IF PE THEN OLS : BD TO i582 

SIGE DU TOU soe 

S476 IF PE€:UCH"U DR PXXcOUDK"U DR 

F$ 07587 DH PEIQUHHU DH P$43"5SF" 
DH PEiIs "LE" BR Pxco"UDD"U THEN PH 

INF S33; "He such Account. Press 

Gigi”: PRUSSE #3: ED To go 

S422 Ci TS gnatum 


Enis PRINT x forth ty nte & Ex 

penze Suse ry GE SUB 5a 

SSeS PRINT “anih income Expens 
# Girrerence-: £6 SUB oe 

S53@ RESTGHE - DET FiB: LET T2 
=Fi:- LEY T3-T1 

S546 FGR 8=-Ni FH 23 STEP 2 

SOS LEY HiB -INF {€:16}4+.5}- LET 
E iB =INT (H {84N434+.5) 

S562 ELBD F3- FRINF PE. "Tu 
tH) H tB+Hii | THE DÉP4Ui(Bl-UIDB RHET! 
Se7FS PET f3 TPGGUIB): LEY Ti-riidu 


SSGS IL {5} #3 THEN PET TS-TIPGN 


SSG KEXT H 

SCE Li SUB 58: PRINT "Totals. " 
713,7T1;TRB 24;T3-T1 

S638 60 BUB 342: PRINT ENA; “pres 


5n EXTER if inrciude Hortgage : P 


RSE HS 

SGheS Cis : FPHINYT “TRS 7; “income 
Expense Difference”: 60 SUR 58 
S638 PRINT THs 3;73,71; THR Dll 


-ii- Ei SUH 5: 

S548 LEY PS-inT thGEX—-KG} 

S658 PRINT “Frain. Preis." ,pp: 3 
DER um 

S665 PHINT UY. 


I-E E SUB Se 
5578 LEY B353: FOR BÆ TO 24 5 


S5688 LEY BSu—HIBI: LET BB-BHHHBH: 

HEEF B 

SES PRINT “Hass monihiy income - 
47 FH pitat} 

S788 PHINT “Hean monthty Expense 
$°°> FH Tirirr2} 

S718 PRINT "Hean Expense last ue 

ar 3°; FH P (ioisl 

57;26 PRINT “if EXCLUDING HORTGHGE 

3“: GO SER 5B 

S736 LECT goa=#3- 6O SUB 148: RETU 

RE 

oss: 

63315 i PRINT SITTM Du mau SHVE oOo 

RBs ihe” program." "IF yo 

u hzvE& Made any changes in the d 

din"""*"- £8 SHS DØ: PRINT " Do 


ar “7io,) 34PP 27 


nei icr is re-tifbad tape ":o& 
g sUB8 Se 
S555 DBH Ui — SHEL 1i = Si 


fu 04 


Doe 

bh 

bep PRINT 7 7 See PD year EXPCM 

SES graph"," 8 Compare EXPENSES 
wi th Budget" 

5108 PRINT 3 See CASH flom st 
atement™”,~ 18 TRANSFER Funds; Re 

peau LEAN” 

GIS PRINT 7 i: See monthiu men 

HE/LEXFEHKSE"," if Exit this progr 

HE” 

GISS PRINT : £i SUB 58B: PRINT C 

BRIGHT H3i;" Fiesse; never Uso": 

PEPER 2," RUN 7 

6138 INPUT "EIZE-E, 1 TO 12 "7;go 

6148 IF go:Ni GR go ote THEN 6D T 

D 6235 

BRIT CLS - £i SUB 5P,:go- 60 TG 
X 

6168 = 3 

51786 IF si THEN 60 Tib 6238 

6188 IF s2 TH Ep Tib 6278 

bois IF 53 THES Ep TO 63828 
62868 IF s4 PEH DD Th 6342 

EZIB IF 55 THEN DD Ti 523782 
Bore 5 

623 -INCOME | 25 £- 

GE INPUT “Hom many Income item 

57 =; THe: LEY HZX-HE- DIH L*i lz 
zis}: DIŞ Hütrsx)-: DIA FUIMX)ID- DI 
H HXiZ,PI)- LEY HXiH1)-"mon"- LE 

T miz) ceon” 

6256 INPUȚF "Has menu Expense ite 

ES? “EHS: DIR TIEHXI)- DET HT- 
: LET FY=#S- BIR I£irkBX,151- DiH 
iRiEHX)Y- LEF HF=n@- PETI TT-HI- L 

EY PPY=AT: LET PPX-HT- DIH U24} 
: DIH Rt24}: DIH PiEHX)- LET BT— 
He 

62682 LEY 5251: IET 51-nà- RETER 


-INCOME -42 
bob INPUT 9 "nme INCUHE item “jf 
Bi," ";ixXibi- IF B—IHX THEN Ler 
53-52: LEF 52-12 


Em1:4:—3 PN ES 
631€ IMPUT “Fame Expense item “; 
iI;" = FBT 
GBS28 IF i-r THEE RESTORE - Fin 
Boe Ti 23 STEP D. READ Ft: IP 
UT ip£i;" insi yez; Expenses $” 
IRIB}: REMY B: LEY 54-53: DEI 523 


RIS EIR- 

6358 INPUT "Uherking Acc. bai ae 
EK’ "Gash Card Bat. 7C “Savines 
etc. bul. 7587 “Cash on hand "; 
CE Cirt. OF Geposit bat. “ODT 
Stocts & Bonds “;,SF’“vatue of Re 
at & Personal prop. “JPR “vatue 
Gf other assets “HRA principal 
bal. of Hortgage “, HE’ “bat. of 
end Hort. ";i12"^*nther toan baian 

ces “;it 

63568 LEF 535-534: LEY s4-né- RETR 
H 

6378 REN IHE ED 

638656 INPUT “Budget amount ror it 
em ",in,;" £$° pin}: LEY bt=bt+si 
Ri: FF MIUCHX THEN LEY 55-HgBB-EDNZE 


ble HERS 


Here's 
that will gene 
around char t 
the accompanui 
Hothing ear -— 
Mayu Save zomebo 
Gf making a an 
Calculations ai 

AS indicat 
line iz cansi 
repetition af a 
GRAPHICS ABC, a 
repetition af G 
Line i828 is a 
GRAPHICS D, the 
famed, and GRAP 
ABE [B] [Ei 
The Characters 


UB, bu Basal 
ittie program 
ate a Frame 
f$, 85 Shown in 
3 iitiusztration. 
haking, but it 
du the troubie 
drui af 
i aver again. 
ed in the REMS, 
£ts af a 
Series af 
nd i858 is a 
RAPHICS FGH. E 
Series af 
Character to be 
HICS E. 


BROTHER HR-5 PRINTER FOR SALE 


Thermal dot-matrix printer 


iemuSIECiear UDG (user-defin 
graphic! keys 
za FOR F= TO i857 s 
30 POKE (USR “Av+F1,8 - 
4d NEXT F j 
Sai generate iipa"z 
Sa PORE USR "a"-7,3 
Y PORE USR "b"47,225 
aa POKE USR “ct4+F,192 
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INTERFACE: Parallel Centronics or RS-232 


PRINTING SPEED: 30 cps 
NO. 


COLUMNS: 80-96 (normal or emphasized pica or elite 


characters), 40-48 (double-width expanded characters), 
66 (reduced double-width expanded characters), 132 


(condensed characters) 
PAPER: 
Paper or thernal paper. 


PRICE: $99.95 US (S+H and PPD.) 


André Laviolette 


1385 ouest, av. Bernard suite 14 
Montréal QUEBEC HZV 1W1 CANADA 


Phone: (514) 273 4103 


friction feed single or continuous. Standard 


